home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d20 / duchie.arc / DU291US3.EXE / pak / UUCP.SCR < prev    next >
Text File  |  1989-11-17  |  1KB  |  61 lines
  1. ;===================================================
  2. ; Dial Back Script for dutchie 2.91 and up V1.1
  3. ;
  4. ; (c) 1989 A.C.S.
  5. ;====================================================
  6.  
  7. ;could also write this much more versatile.
  8.  
  9. ;First set a general Timeout for this script
  10.  
  11.         watchdog 90
  12.  
  13. ;Now enable a general error exit routine. Makes the script
  14. ; a lot easier on the eyes.
  15.  
  16.         OnError Error
  17.  
  18. ;The next one is not really needed, dutchie
  19. ;leaves the comport open. Used for standalone testing
  20.  
  21. ;SetCom 1
  22.  
  23.  
  24. ;Set up the modem and dial out...
  25.  
  26.         SetDtr On
  27.         ModemCommand SetupOut
  28.         Show Dialling......0%2%3\
  29.         Dial 0%2%3
  30.  
  31. ; if we get here there have been no errors so..
  32.  
  33.         Show Connected allright\
  34.  
  35. ;handle whatever login procedure is needed on the remote
  36. ;modem
  37.  
  38.  
  39. ; musat whack CR here, so disable general error exits
  40.         OnError Off
  41.         repeat
  42.           emit X|
  43.             Waitfor 2 Login:
  44.         untilflag
  45.         OnError Error
  46.         Emit hanno|
  47.         Waitfor 10 Password:
  48.         Emit pfff|
  49.         Show \
  50.         Waitfor 10 accepted
  51.         ifnotflag herhaal
  52.         clearoutbuf
  53.         Exit
  54.  
  55. Label Error
  56.         SetDtr Off
  57.         Show \Een fout, script afgebroken\
  58.         Abort 255
  59.  
  60.  
  61.